      Dim x As New class1(3)